\name{CAAUranus_RadiusVector}
\alias{CAAUranus_RadiusVector}
\title{
CAAUranus_RadiusVector
}
\description{
CAAUranus_RadiusVector
}
\usage{
CAAUranus_RadiusVector(JD)
}
\arguments{
  \item{JD}{ The date in Dynamical time to calculate for. 
}
}
\details{
}
\value{
the radius vector in astronomical units. 
}
\references{ 
 Meeus, J. H. (1991). Astronomical algorithms. Willmann-Bell, Incorporated.}
\author{  C++ code by PJ Naughter, imported to R by Jinlong Zhang}
\note{}
\seealso{}
\examples{
JD = 2456597.5
CAAUranus_RadiusVector(JD)
}
\keyword{ Uranus }
